The Complete Work of Mahatma Gandhi/The Complete Work of Mahatma Gandhi-CD interactive.iso/pc/ganmac/eb.cst/00282_Script_vidvol255

Text File | 1999-05-31 | 2KB | 59 lines

on mouseDown
  --  Vol 255
  global gvolume, cspname, gwhere
  set gwhere to the movieTime of sprite 6
  set the soundEnabled to true
  updateStage
  set wgrp to chars(cspname,1,1)
  if gvolume < 255 then
    if gvolume = 150 then
      set the member of sprite 107 to the number of member (wgrp&"volm")
    else
      set the member of sprite 106 to the number of member (wgrp&"vol0")
    end if
  end if
  set the member of sprite 108 to the number of member ("r"&wgrp&"voll")
  set the soundLevel to 7
  set the volume of sound 1 to 255
  --    set the volume of sound 2 to 255
  set the volume of sound 6 to 255
  updateStage
  --    if gvolume = 0 then

  --    end if
  set gvolume to 255
  updateStage
end

on mouseUp
  global gxx, vlocH, vlocV
  set ii to the name of member (the memberNum of sprite gxx) of castLib "eb.cst"
  set mm to chars(ii,2,6)
  set the memberNum of sprite gxx to the number of member mm

  set the visible of sprite 5 to true
  set the visible of sprite 98 to true
  set the visible of sprite 101 to true
  set the visible of sprite 102 to true
  set wm to the name of member (the memberNum of sprite 101) of castLib "eb.cst"
  global pv
  if wm = "play" then
    set pv to 2
    go to frame "video"
  else
    set pv to 1
    go to frame "video"
    --        set xx to the movieTime of sprite 6
    --        set the movieTime of sprite 6 to -1
    --        updateStage
    --        set the movieTime of sprite 6 to xx
    --        set the movierate of sprite 6 to 1
  end if
  set the locH of sprite 98 to vlocH
  set the locV of sprite 98 to vlocV
  set the visible of sprite 106 to false
  set the visible of sprite 107 to false
  set the visible of sprite 108 to false
  CHASPCURSOR -1,106,108
  updateStage
end